inherited FPesquisaBaixaCR: TFPesquisaBaixaCR
  Left = 699
  Top = 292
  Caption = 'Pesquisa Baixa Contas a Receber'
  ClientHeight = 338
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel2: TPanel
    inherited BtnLimpar: TBitBtn
      OnClick = BtnLimparClick
    end
    inherited BtnImprimir: TBitBtn
      OnClick = BtnImprimirClick
    end
    inherited BtnSelecionar: TBitBtn
      Tag = 5
      Enabled = False
    end
  end
  inherited Panel1: TPanel
    Height = 297
    Ctl3D = False
    ParentCtl3D = False
    object Label10: TLabel [0]
      Left = 6
      Top = 217
      Width = 46
      Height = 13
      Caption = 'Empresas'
    end
    object Label2: TLabel [1]
      Left = 7
      Top = 2
      Width = 53
      Height = 13
      Caption = 'Cliente (F8)'
    end
    object Label9: TLabel [2]
      Left = 6
      Top = 153
      Width = 52
      Height = 13
      Caption = 'Data Baixa'
    end
    object Label6: TLabel [3]
      Left = 92
      Top = 172
      Width = 6
      Height = 13
      Caption = 'a'
    end
    object Label1: TLabel [4]
      Left = 7
      Top = 78
      Width = 28
      Height = 13
      Caption = 'Conta'
    end
    object Label3: TLabel [5]
      Left = 112
      Top = 41
      Width = 55
      Height = 13
      Caption = 'Documento'
    end
    object Label4: TLabel [6]
      Left = 6
      Top = 113
      Width = 37
      Height = 13
      Caption = 'Cheque'
    end
    object Label20: TLabel [7]
      Left = 8
      Top = 39
      Width = 64
      Height = 13
      Caption = 'Grupo Cliente'
      FocusControl = BtnConsultar
    end
    inherited DBGrid1: TDBGrid
      Top = 305
      Height = 102
      Align = alNone
      TabOrder = 11
      Columns = <
        item
          Expanded = False
          FieldName = 'TITULO'
          Title.Caption = 'Titulo'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'CONTA'
          Title.Caption = 'Conta'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DOCUMENTO'
          Title.Caption = 'Documento'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'CHEQUE'
          Title.Caption = 'Cheque'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FORNECEDOR'
          Title.Caption = 'Fornecedor'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'VALORTITULO'
          Title.Caption = 'Valor Titulo'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DATAVENCIMENTO'
          Title.Caption = 'Data Vencimento'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'SALDO'
          Title.Caption = 'Saldo'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DATABAIXA'
          Title.Caption = 'Data Baixa'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'VALORBAIXA'
          Title.Caption = 'Valor Baixa'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'HISTORICO'
          Title.Caption = 'Hist'#243'rico'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DESCONTO'
          Title.Caption = 'desconto'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'JUROSMULTA'
          Title.Caption = 'Juros e Multa'
          Visible = True
        end>
    end
    inherited Panel3: TPanel
      Top = 276
      TabOrder = 10
    end
    object CkBTodasEmpresas: TCheckBox
      Left = 6
      Top = 199
      Width = 118
      Height = 17
      Caption = 'Todas as Empresas'
      TabOrder = 8
      OnClick = CkBTodasEmpresasClick
    end
    object CLBEmpresas: TCheckListBox
      Left = 1
      Top = 236
      Width = 409
      Height = 40
      Align = alBottom
      Columns = 1
      ItemHeight = 13
      TabOrder = 9
    end
    object DBLCBCliente: TDBLookupComboBox
      Left = 7
      Top = 16
      Width = 394
      Height = 19
      KeyField = 'CLI_CODIGO'
      ListField = 'CLI_RAZAO'
      ListSource = DSCliente
      TabOrder = 0
      OnKeyDown = DBLCBClienteKeyDown
    end
    object DEDataBaixaIni: TDateEdit
      Left = 6
      Top = 167
      Width = 88
      Height = 21
      NumGlyphs = 2
      TabOrder = 6
    end
    object DEDataBaixaFim: TDateEdit
      Left = 100
      Top = 167
      Width = 88
      Height = 21
      NumGlyphs = 2
      TabOrder = 7
    end
    object DBLCBConta: TDBLookupComboBox
      Left = 7
      Top = 91
      Width = 394
      Height = 19
      KeyField = 'CONT_CORR_CODIGO'
      ListField = 'CONT_CORR_DESCRICAO'
      ListSource = DSConta
      TabOrder = 4
      OnKeyDown = DBLCBClienteKeyDown
    end
    object EDocumento: TEdit
      Left = 112
      Top = 55
      Width = 73
      Height = 19
      MaxLength = 10
      TabOrder = 2
    end
    object ECheque: TEdit
      Left = 6
      Top = 127
      Width = 49
      Height = 19
      MaxLength = 6
      TabOrder = 5
    end
    object cbxTipoBusca: TComboBox
      Left = 188
      Top = 55
      Width = 72
      Height = 21
      ItemHeight = 13
      TabOrder = 3
      Text = 'igual'
      OnChange = cbxTipoBuscaChange
      Items.Strings = (
        'Igual'
        'Contendo'
        'Iniciado'
        'Terminado')
    end
    object edGrupoCliente: TEdit
      Left = 7
      Top = 55
      Width = 100
      Height = 19
      Ctl3D = False
      MaxLength = 5
      ParentCtl3D = False
      TabOrder = 1
    end
  end
  inherited QPesquisa: TQuery
    Active = True
    SQL.Strings = (
      'SELECT'
      #9'CR_CODIGO AS TITULO,'
      #9'CR_DOCUMENTO AS DOCUMENTO,'
      #9'CR_HISTORICO1,'
      #9'CR_HISTORICO2,'
      #9'CLI_RAZAO AS CLIENTE,'
      #9'CR_SALDO AS SALDO,'
      #9'LANC_CODIGO AS LANCTO,'
      #9'LANC_HISTORICO1 AS HISTORICO1,'
      #9'LANC_HISTORICO2 AS HISTORICO2,'
      #9'CR_VALOR AS VALORTITULO,'
      #9'CR_DATAVENCIMENTO AS DATAVENCIMENTO,'
      #9'LANC_DATA AS DATABAIXA,'
      #9'LANC_CHEQUE AS CHEQUE,'
      #9'LANC_VALOR AS VALORBAIXA,'
      #9'LANC_JUROSMULTA AS JUROSMULTA,'
      #9'PLANOCONTAS.DESCRICAO AS CLASSIFICACAO,'
      #9'CONT_CORR_DESCRICAO AS CONTA'
      'FROM'
      #9'CONTACORRENTE'
      #9'RIGHT JOIN ( LANCAMENTO'
      
        #9#9'     INNER JOIN (CONTASRECEBER LEFT JOIN CLIENTE ON CR_CLIENTE' +
        ' = CLI_CODIGO) ON'
      #9#9#9#9'LANC_TITULO = CR_CODIGO )ON CONT_CORR_CODIGO = LANC_CONTA'
      
        #9'         INNER JOIN PLANOCONTAS ON(contasreceber.CR_PLANO = PLA' +
        'NOCONTAS.CODIGO)'
      'WHERE'
      #9'(LANC_CPCR = '#39'R'#39')AND'
      #9'(LANC_TITULO > 0)')
    Left = 136
    Top = 217
  end
  inherited DSPesquisa: TDataSource
    Top = 217
  end
  object DSCliente: TDataSource
    DataSet = DMGestao.QCliente
    Left = 208
    Top = 48
  end
  object DSConta: TDataSource
    DataSet = DMFinanceiro.QConta
    Left = 208
    Top = 88
  end
end
